home *** CD-ROM | disk | FTP | other *** search
/ Minami 55 / MINAMI55.ISO / Varios / Juegos / 03 - Red_Ninja.swf / scripts / DefineSprite_171 / frame_1 / DoAction.as
Text File  |  2004-10-04  |  672b  |  25 lines
  1. n = "0";
  2. while(n < "10")
  3. {
  4.    n += "1";
  5.    radius1 = getProperty("/map/p", _width) / "4";
  6.    radius2 = getProperty("/map/cit" add n, _width) / "4";
  7.    obj1_x = getProperty("/map/p", _X);
  8.    obj2_x = getProperty("/map/cit" add n, _X);
  9.    delta_x = obj1_x - obj2_x;
  10.    obj1_y = getProperty("/map/p", _Y);
  11.    obj2_y = getProperty("/map/cit" add n, _Y);
  12.    delta_y = obj1_y - obj2_y;
  13.    if((radius1 + radius2) * (radius1 + radius2) >= delta_x * delta_x + delta_y * delta_y)
  14.    {
  15.       if(eval("/:busydiag") == "0")
  16.       {
  17.          tellTarget("/map/cit" add n)
  18.          {
  19.             gotoAndStop("check");
  20.             play();
  21.          }
  22.       }
  23.    }
  24. }
  25.